home *** CD-ROM | disk | FTP | other *** search
/ Complete Internet Archive / Complete Internet Archive.iso / Modem Dialers & Utilities / MODEM.CM_ / MODEM
Encoding:
Text File  |  1996-12-11  |  1.4 KB  |  52 lines
  1. #
  2. #  Trumpet Winsock 3.0 Modem.cmd
  3. #
  4. #  Copyright (C) 1994,1995 Peter R. Tattam & 
  5. #  Trumpet Software International Pty Ltd (TSI)
  6. #  All rights reserved.
  7. #
  8. #  Unless TSI has given prior written consent to such use, 
  9. #  no permission is granted to distribute or otherwise make available 
  10. #  to the public modified versions of this script for commercial purposes.  
  11. #  Any permitted distribution of modified versions of the script must
  12. #  retain the copyright notice at the start of this file and must clearly 
  13. #  identify those parts of the file which have been modified.
  14. #
  15. $modeminit = "&f&c1&k3"
  16. $modemdial = "dt"
  17. $modemhangup = "h"
  18. $modemreset = "z"
  19. %usereset = 1
  20. %usedtr = 0
  21. %useat = 1
  22. %ok = [load $modeminit]
  23. %ok = %ok & [load $modemdial]
  24. %ok = %ok & [load $modemhangup]
  25. %ok = %ok & [load $modemreset]
  26. %ok = %ok & [load %usereset]
  27. %ok = %ok & [load %usedtr]
  28. %ok = %ok & [load %useat]
  29. if ! %ok | param(1) <> "preload"
  30.   dialog "profile.res","modem",%ok
  31.     edit $modeminit,101
  32.     edit $modemdial,102
  33.     edit $modemhangup,103
  34.     edit $modemreset,104
  35.     toggle %usereset,105
  36.     toggle %useat,106
  37.     toggle %usedtr,107
  38.     help "trumpwsk.hlp",999,"modem profile"
  39.   end
  40.   if %ok
  41.     save $modeminit
  42.     save $modemdial
  43.     save $modemhangup
  44.     save $modemreset
  45.     save %usereset
  46.     save %useat
  47.     save %usedtr
  48.   else
  49.     exit
  50.   end
  51. end
  52.